home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / x2ftp / msdos / docs / winer / chap6-2.bas < prev    next >
Encoding:
BASIC Source File  |  1992-05-13  |  391 b   |  20 lines
  1. '*********** CHAP6-2.BAS - proves that all files are really binary access
  2.  
  3. 'Copyright (c) 1992 Ethan Winer
  4.  
  5. OPEN "File1" FOR OUTPUT AS #1
  6.   PRINT #1, "Testing"; SPC(13);
  7. CLOSE
  8.  
  9. OPEN "File2" FOR BINARY AS #1
  10.   Work$ = "Testing" + SPACE$(13)
  11.   PUT #1, , Work$
  12. CLOSE
  13.  
  14. OPEN "File3" FOR RANDOM AS #1 LEN = 20
  15.   FIELD #1, 20 AS Temp$
  16.   LSET Temp$ = "Testing"
  17.   PUT #1
  18. CLOSE
  19. END
  20.